home *** CD-ROM | disk | FTP | other *** search
- object FLinks: TFLinks
- Left = 276
- Top = 119
- AutoScroll = False
- BorderIcons = []
- Caption = 'Missing Links'
- ClientHeight = 420
- ClientWidth = 456
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- KeyPreview = True
- OldCreateOrder = False
- OnActivate = FormActivate
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object AMContainer1: TAMContainer
- Left = 0
- Top = 0
- Width = 336
- Height = 400
- Align = alClient
- DoubleBuffered = False
- object bsSkinScrollBar1: TbsSkinScrollBar
- Left = 0
- Top = 380
- Width = 336
- Height = 20
- TabOrder = 1
- Visible = False
- SkinData = SkinDataModule.SkinData
- SkinDataName = 'hscrollbar'
- DefaultFont.Charset = DEFAULT_CHARSET
- DefaultFont.Color = clWindowText
- DefaultFont.Height = 14
- DefaultFont.Name = 'Arial'
- DefaultFont.Style = []
- DefaultWidth = 0
- DefaultHeight = 0
- UseSkinFont = True
- Both = False
- BothMarkerWidth = 0
- BothSkinDataName = 'bothhscrollbar'
- CanFocused = False
- Align = alBottom
- Kind = sbHorizontal
- PageSize = 0
- Min = 0
- Max = 100
- Position = 0
- SmallChange = 1
- LargeChange = 1
- AutoLargeChange = False
- end
- object bsSkinScrollBar2: TbsSkinScrollBar
- Left = 316
- Top = 0
- Width = 20
- Height = 380
- TabOrder = 2
- Visible = False
- SkinData = SkinDataModule.SkinData
- SkinDataName = 'vscrollbar'
- DefaultFont.Charset = DEFAULT_CHARSET
- DefaultFont.Color = clWindowText
- DefaultFont.Height = 14
- DefaultFont.Name = 'Arial'
- DefaultFont.Style = []
- DefaultWidth = 0
- DefaultHeight = 0
- UseSkinFont = True
- Both = False
- BothMarkerWidth = 0
- BothSkinDataName = 'bothhscrollbar'
- CanFocused = False
- Align = alRight
- Kind = sbVertical
- PageSize = 0
- Min = 0
- Max = 100
- Position = 0
- SmallChange = 1
- LargeChange = 1
- AutoLargeChange = False
- end
- object DirTreeView: TAMLinksTreeView
- Left = 0
- Top = 0
- Width = 316
- Height = 380
- VScrollBar = bsSkinScrollBar2
- DefaultFont.Charset = DEFAULT_CHARSET
- DefaultFont.Color = clWindowText
- DefaultFont.Height = 13
- DefaultFont.Name = 'Tahoma'
- DefaultFont.Style = []
- UseSkinFont = True
- SkinData = SkinDataModule.SkinData
- SkinDataName = 'treeview'
- DefaultColor = clWindow
- Align = alClient
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 13
- Font.Name = 'Tahoma'
- Font.Style = []
- Indent = 25
- MultiSelect = True
- ParentFont = False
- PopupMenu = pmLinks
- ReadOnly = True
- RightClickSelect = True
- RowSelect = True
- TabOrder = 0
- OnChange = DirTreeViewChange
- OnGetImageIndex = DirTreeViewGetImageIndex
- OnKeyDown = DirTreeViewKeyDown
- OnMouseDown = DirTreeViewMouseDown
- ButtonOptions.LineColor = clBlack
- ButtonOptions.LineStyle = lsDot
- ButtonOptions.CollapsedIndex = 0
- ButtonOptions.ExpandedIndex = 1
- ButtonOptions.AddChildIndex = 0
- SelectionOptions.LineColor = 11446942
- SelectionOptions.FillColor = 11446942
- SelectionOptions.LinkFillColor = clBlack
- SelectionOptions.RoundEllipseX = 5
- SelectionOptions.RoundEllipseY = 5
- SelectionOptions.Font.Charset = DEFAULT_CHARSET
- SelectionOptions.Font.Color = clWhite
- SelectionOptions.Font.Height = 13
- SelectionOptions.Font.Name = 'Tahoma'
- SelectionOptions.Font.Style = []
- ButtonImages = MainForm.ilArrowButtons
- ItemHeight = 20
- DigitFont.Charset = DEFAULT_CHARSET
- DigitFont.Color = clWindowText
- DigitFont.Height = -11
- DigitFont.Name = 'MS Sans Serif'
- DigitFont.Style = []
- DigitFieldWidth = 0
- DigitShow = False
- ImageList = MainForm.ilLocateByLocationFolders
- ImageListSel = MainForm.ilLocateByLocationFoldersSel
- ImageIndent = 5
- end
- end
- object AMStatusContainer: TAMStatusContainer
- Left = 0
- Top = 400
- Width = 456
- Height = 20
- IgnoreEraseBKGND = True
- Align = alBottom
- DoubleBuffered = False
- TopLineColor = clBlack
- object gProgress: TbsSkinGauge
- Left = 304
- Top = 0
- Width = 152
- Height = 20
- HelpContext = 245
- TabOrder = 0
- Visible = False
- SkinData = SkinDataModule.SkinData
- SkinDataName = 'gaugestatus'
- DefaultFont.Charset = DEFAULT_CHARSET
- DefaultFont.Color = 8947324
- DefaultFont.Height = 12
- DefaultFont.Name = 'Tahoma'
- DefaultFont.Style = []
- DefaultWidth = 0
- DefaultHeight = 0
- UseSkinFont = False
- VisibleOnlyIfWork = True
- ProgressText = 'Loading structure'
- ShowProgressText = True
- ShowPercent = False
- MinValue = 0
- MaxValue = 100
- Value = 100
- Vertical = False
- Align = alRight
- end
- object ssPath: TAMStatusSection
- Left = 0
- Top = 0
- Width = 4
- Height = 20
- Align = alLeft
- Color = 14604480
- DoubleBuffered = False
- ItemInfo = iiNone
- AMStatusContainer = AMStatusContainer
- ShowPropertyName = False
- CanActive = False
- SpaceHorz = 7
- FocusColor = clBlack
- ImageIndex = 0
- PropertyType = ptVariant
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- end
- object ssClient: TAMStatusSection
- Left = 4
- Top = 0
- Width = 300
- Height = 20
- Align = alClient
- Color = 14474975
- DoubleBuffered = False
- ItemInfo = iiCustom
- AMStatusContainer = AMStatusContainer
- ShowPropertyName = False
- CanActive = False
- SpaceHorz = 7
- FocusColor = clBlack
- ImageIndex = 0
- PropertyType = ptVariant
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 13
- Font.Name = 'Tahoma'
- Font.Style = []
- end
- end
- object cntButtons: TAMContainer
- Left = 336
- Top = 0
- Width = 120
- Height = 400
- Align = alRight
- DoubleBuffered = False
- object bOk: TbsSkinButton
- Left = 13
- Top = 12
- Width = 96
- Height = 24
- TabOrder = 0
- SkinData = SkinDataModule.SkinData
- SkinDataName = 'buttonlight'
- DefaultFont.Charset = DEFAULT_CHARSET
- DefaultFont.Color = clWindowText
- DefaultFont.Height = 13
- DefaultFont.Name = 'Tahoma'
- DefaultFont.Style = []
- DefaultWidth = 0
- DefaultHeight = 0
- UseSkinFont = True
- AllowAllUp = False
- TabStop = True
- CanFocused = True
- Down = False
- GroupIndex = 0
- Caption = 'Ok'
- NumGlyphs = 2
- Spacing = 1
- Default = True
- OnClick = bOkClick
- end
- object bClose: TbsSkinButton
- Left = 13
- Top = 107
- Width = 96
- Height = 24
- TabOrder = 1
- SkinData = SkinDataModule.SkinData
- SkinDataName = 'buttonlight'
- DefaultFont.Charset = DEFAULT_CHARSET
- DefaultFont.Color = clWindowText
- DefaultFont.Height = 13
- DefaultFont.Name = 'Tahoma'
- DefaultFont.Style = []
- DefaultWidth = 0
- DefaultHeight = 0
- UseSkinFont = True
- AllowAllUp = False
- TabStop = True
- CanFocused = True
- Down = False
- GroupIndex = 0
- Caption = 'Close'
- NumGlyphs = 2
- Spacing = 1
- Cancel = True
- OnClick = bCloseClick
- end
- object bNewPath: TbsSkinButton
- Left = 13
- Top = 43
- Width = 96
- Height = 24
- TabOrder = 2
- SkinData = SkinDataModule.SkinData
- SkinDataName = 'buttonlight'
- DefaultFont.Charset = DEFAULT_CHARSET
- DefaultFont.Color = clWindowText
- DefaultFont.Height = 13
- DefaultFont.Name = 'Tahoma'
- DefaultFont.Style = []
- DefaultWidth = 0
- DefaultHeight = 0
- UseSkinFont = True
- AllowAllUp = False
- TabStop = True
- CanFocused = True
- Down = False
- GroupIndex = 0
- Caption = 'Set new path'
- NumGlyphs = 2
- Spacing = 1
- Enabled = False
- OnClick = Setnewpath1Click
- end
- object bRefresh: TbsSkinButton
- Left = 13
- Top = 75
- Width = 96
- Height = 24
- TabOrder = 3
- SkinData = SkinDataModule.SkinData
- SkinDataName = 'buttonlight'
- DefaultFont.Charset = DEFAULT_CHARSET
- DefaultFont.Color = clWindowText
- DefaultFont.Height = 13
- DefaultFont.Name = 'Tahoma'
- DefaultFont.Style = []
- DefaultWidth = 0
- DefaultHeight = 0
- UseSkinFont = True
- AllowAllUp = False
- TabStop = True
- CanFocused = True
- Down = False
- GroupIndex = 0
- Caption = 'Refresh'
- NumGlyphs = 2
- Spacing = 1
- OnClick = bRefreshClick
- end
- end
- object FormSkin: TbsBusinessSkinForm
- GradientStartColor = clBlack
- GradientEndColor = clBlack
- DrawBackground = True
- ShowIcon = False
- MaximizeOnFullScreen = False
- AlphaBlend = False
- AlphaBlendAnimation = False
- AlphaBlendValue = 200
- ShowObjectHint = False
- MenusAlphaBlend = False
- MenusAlphaBlendAnimation = False
- MenusAlphaBlendValue = 0
- DefCaptionFont.Charset = DEFAULT_CHARSET
- DefCaptionFont.Color = clBtnText
- DefCaptionFont.Height = 14
- DefCaptionFont.Name = 'Tahoma'
- DefCaptionFont.Style = [fsBold]
- DefInActiveCaptionFont.Charset = DEFAULT_CHARSET
- DefInActiveCaptionFont.Color = clBtnShadow
- DefInActiveCaptionFont.Height = 14
- DefInActiveCaptionFont.Name = 'Tahoma'
- DefInActiveCaptionFont.Style = [fsBold]
- DefMenuItemHeight = 20
- DefMenuItemFont.Charset = DEFAULT_CHARSET
- DefMenuItemFont.Color = clWindowText
- DefMenuItemFont.Height = 14
- DefMenuItemFont.Name = 'Tahoma'
- DefMenuItemFont.Style = []
- UseDefaultSysMenu = True
- SkinData = SkinDataModule.SkinData
- MenusSkinData = SkinDataModule.SkinData
- MinHeight = 0
- MinWidth = 0
- Magnetic = False
- MagneticSize = 0
- BorderIcons = [biSystemMenu, biMinimize, biMaximize]
- Left = 304
- Top = 8
- end
- object pmLinks: TbsSkinPopupMenu
- OnPopup = pmLinksPopup
- Left = 32
- Top = 128
- object Setnewpath1: TMenuItem
- Caption = 'Set new path...'
- OnClick = Setnewpath1Click
- end
- end
- object OpenDialog1: TOpenDialog
- Filter = 'sdf|*.*|sfd|*.gh'
- Left = 376
- Top = 184
- end
- object BrowseDirectoryDlg1: TBrowseDirectoryDlg
- Options = [bfDirectoriesOnly, bfComputers]
- StatusText = 'C:\Documents and Settings\alexius.ALEXIUS\Desktop'
- ShowSelectionInStatus = True
- Left = 112
- Top = 208
- end
- end
-